home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 December / Chip_2003-12_cd1.bin / program / ctenari / ShiCola / CodePad37.exe / $INSTDIR / Syntax Definitions / perl.def < prev    next >
Encoding:
Text File  |  2003-10-17  |  3.8 KB  |  158 lines
  1. object TPersHolder
  2.   P.Name = 'Perl'
  3.   P.Extensions.Strings = (
  4.     'Perl files (*.pl)|*.pl')
  5.   P.SyntaxBlocks = <
  6.     item
  7.       Name = 'Default'
  8.       ID = 0
  9.       CaseSensitive = True
  10.       UseMetaSymbol = True
  11.       UseMetaToWrapLines = True
  12.       MetaSymbol = '\'
  13.       FIText = 0
  14.       FIIntNum = 1
  15.       FIFloatNum = 2
  16.       FIHexNum = 3
  17.       FISymbol = 9
  18.       UseSymbols = True
  19.       UseComments = True
  20.       UseSingleLineComments = True
  21.       UseStrings = True
  22.       UseSingleLineStrings = True
  23.       UseNumbers = True
  24.       UsePrefixedIdentifiers = True
  25.       UseKeywords = True
  26.       BlockDelimiters = <>
  27.       SingleLineCommentDelimiters = <
  28.         item
  29.           FontID = 4
  30.           LeftDelimiter = '#'
  31.         end>
  32.       SingleLineStringDelimiters = <
  33.         item
  34.           FontID = 5
  35.           LeftDelimiter = '"'
  36.           RightDelimiter = '"'
  37.         end
  38.         item
  39.           FontID = 6
  40.           LeftDelimiter = #39
  41.           RightDelimiter = #39
  42.         end
  43.         item
  44.           FontID = 7
  45.           LeftDelimiter = '`'
  46.           RightDelimiter = '`'
  47.         end>
  48.       IdentPrefixes = <
  49.         item
  50.           LeftDelimiter = '$#'
  51.         end
  52.         item
  53.           LeftDelimiter = '$'
  54.         end>
  55.       KeywordSets = <
  56.         item
  57.           FontID = 8
  58.           Name = 'reserved'
  59.           Keywords = 
  60.             'and,cmp,continue,do,else,elsif,eq,for,foreach,ge,goto,gt,if,last' +
  61.             ',le,lt,my,ne,next,not,or,package,return,sub,switch,unless,until,' +
  62.             'use,while,xor'
  63.         end>
  64.     end>
  65.   P.FontTable = <
  66.     item
  67.       FontID = 0
  68.       GlobalAttrID = 'Whitespace'
  69.       Font.Charset = DEFAULT_CHARSET
  70.       Font.Color = clBlack
  71.       Font.Height = -13
  72.       Font.Name = 'Courier New'
  73.       Font.Style = []
  74.     end
  75.     item
  76.       FontID = 1
  77.       GlobalAttrID = 'Integer'
  78.       Font.Charset = DEFAULT_CHARSET
  79.       Font.Color = clGreen
  80.       Font.Height = -13
  81.       Font.Name = 'Courier New'
  82.       Font.Style = []
  83.     end
  84.     item
  85.       FontID = 2
  86.       GlobalAttrID = 'Float'
  87.       Font.Charset = DEFAULT_CHARSET
  88.       Font.Color = clGreen
  89.       Font.Height = -13
  90.       Font.Name = 'Courier New'
  91.       Font.Style = []
  92.     end
  93.     item
  94.       FontID = 3
  95.       GlobalAttrID = 'Integer'
  96.       Font.Charset = DEFAULT_CHARSET
  97.       Font.Color = clGreen
  98.       Font.Height = -13
  99.       Font.Name = 'Courier New'
  100.       Font.Style = []
  101.     end
  102.     item
  103.       FontID = 4
  104.       GlobalAttrID = 'Comment'
  105.       Font.Charset = DEFAULT_CHARSET
  106.       Font.Color = clGray
  107.       Font.Height = -13
  108.       Font.Name = 'Courier New'
  109.       Font.Style = [fsItalic]
  110.     end
  111.     item
  112.       FontID = 5
  113.       GlobalAttrID = 'String'
  114.       Font.Charset = DEFAULT_CHARSET
  115.       Font.Color = clMaroon
  116.       Font.Height = -13
  117.       Font.Name = 'Courier New'
  118.       Font.Style = []
  119.     end
  120.     item
  121.       FontID = 6
  122.       GlobalAttrID = 'String'
  123.       Font.Charset = DEFAULT_CHARSET
  124.       Font.Color = clMaroon
  125.       Font.Height = -13
  126.       Font.Name = 'Courier New'
  127.       Font.Style = []
  128.     end
  129.     item
  130.       FontID = 7
  131.       GlobalAttrID = 'String'
  132.       Font.Charset = DEFAULT_CHARSET
  133.       Font.Color = clMaroon
  134.       Font.Height = -13
  135.       Font.Name = 'Courier New'
  136.       Font.Style = []
  137.     end
  138.     item
  139.       FontID = 8
  140.       GlobalAttrID = 'Reserved words'
  141.       Font.Charset = DEFAULT_CHARSET
  142.       Font.Color = clBlue
  143.       Font.Height = -13
  144.       Font.Name = 'Courier New'
  145.       Font.Style = [fsBold]
  146.     end
  147.     item
  148.       FontID = 9
  149.       GlobalAttrID = 'Delimiters'
  150.       Font.Charset = DEFAULT_CHARSET
  151.       Font.Color = clBlack
  152.       Font.Height = -13
  153.       Font.Name = 'Courier New'
  154.       Font.Style = []
  155.     end>
  156.   P.SyntaxVersion = 3
  157. end
  158.